home *** CD-ROM | disk | FTP | other *** search
/ PC Home 48 / Fun Clicp Art 5000.iso / r / mbm / 00742_DE-IN 1 lec.ls < prev    next >
Encoding:
Text File  |  1996-05-11  |  411 b   |  15 lines
  1. on enterFrame
  2.   global gMaxBoutons, g1erSprLoc, g1erSprChr, g1erSprNav, gEtudAct, exitFrame, gBarChron, gSujet0, gScopeDe, gListCod
  3.   set gMaxBoutons to 31
  4.   set g1erSprLoc to 30
  5.   preLoad(the frame + 12)
  6.   set EtudAct to "lec"
  7.   set monEpok to gSujet0(Le_Epoque)
  8.   gBarChron(fleche, 0, monEpok, 2)
  9.   gBarChron(fleche, 1, monEpok, 0)
  10.   gScopeDe(Restore)
  11.   gScopeDe(visible, 0)
  12.   BigPurge()
  13.   puppetSound(0)
  14. end
  15.